home *** CD-ROM | disk | FTP | other *** search
- object ObjectBrowserForm: TObjectBrowserForm
- Left = 285
- Top = 67
- Width = 650
- Height = 663
- Caption = 'Object Browser'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 13
- object Splitter1: TSplitter
- Left = 422
- Top = 0
- Width = 3
- Height = 636
- Cursor = crHSplit
- Align = alRight
- end
- object TPanel
- Left = 425
- Top = 0
- Width = 217
- Height = 636
- Align = alRight
- BevelOuter = bvNone
- TabOrder = 0
- object GrdProp: TStringGrid
- Left = 0
- Top = 22
- Width = 217
- Height = 614
- Align = alClient
- BorderStyle = bsNone
- Color = clBtnFace
- ColCount = 2
- DefaultColWidth = 108
- DefaultRowHeight = 16
- FixedCols = 0
- RowCount = 1
- FixedRows = 0
- Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRangeSelect, goEditing]
- TabOrder = 0
- end
- object TCPropType: TTabControl
- Left = 0
- Top = 0
- Width = 217
- Height = 22
- Align = alTop
- TabIndex = 0
- TabOrder = 1
- Tabs.Strings = (
- 'Properties'
- 'Events')
- OnChange = TCPropTypeChange
- end
- end
- object TPanel
- Left = 0
- Top = 0
- Width = 422
- Height = 636
- Align = alClient
- BevelOuter = bvNone
- TabOrder = 1
- object Splitter2: TSplitter
- Left = 0
- Top = 432
- Width = 422
- Height = 3
- Cursor = crVSplit
- Align = alTop
- end
- object TPanel
- Left = 0
- Top = 0
- Width = 422
- Height = 432
- Align = alTop
- BevelOuter = bvNone
- TabOrder = 0
- object TvOwnerHierarchy: TTreeView
- Left = 0
- Top = 32
- Width = 422
- Height = 400
- ReadOnly = True
- Indent = 19
- OnChange = TvOwnerHierarchyChange
- Align = alClient
- TabOrder = 0
- end
- object TPanel
- Left = 0
- Top = 0
- Width = 422
- Height = 32
- Align = alTop
- BevelOuter = bvNone
- TabOrder = 1
- object Label1: TLabel
- Left = 8
- Top = 10
- Width = 96
- Height = 13
- Caption = 'Ownership hierarchy'
- end
- object BtnUpdate: TButton
- Left = 118
- Top = 4
- Width = 75
- Height = 25
- Caption = '&Update'
- TabOrder = 0
- OnClick = BtnUpdateClick
- end
- end
- end
- object TPanel
- Left = 0
- Top = 435
- Width = 422
- Height = 201
- Align = alClient
- BevelOuter = bvNone
- TabOrder = 1
- object Splitter3: TSplitter
- Left = 208
- Top = 0
- Width = 3
- Height = 201
- Cursor = crHSplit
- end
- object TPanel
- Left = 0
- Top = 0
- Width = 208
- Height = 201
- Align = alLeft
- BevelOuter = bvNone
- TabOrder = 0
- object TPanel
- Left = 0
- Top = 0
- Width = 208
- Height = 22
- Align = alTop
- BevelOuter = bvNone
- TabOrder = 0
- object Label2: TLabel
- Left = 6
- Top = 4
- Width = 104
- Height = 13
- Caption = 'Parent/child hierarchy'
- end
- end
- object TvChildrenHierarchy: TTreeView
- Left = 0
- Top = 22
- Width = 208
- Height = 179
- ReadOnly = True
- Indent = 19
- Align = alClient
- TabOrder = 1
- end
- end
- object TPanel
- Left = 211
- Top = 0
- Width = 211
- Height = 201
- Align = alClient
- BevelOuter = bvNone
- TabOrder = 1
- object TPanel
- Left = 0
- Top = 0
- Width = 211
- Height = 22
- Align = alTop
- BevelOuter = bvNone
- TabOrder = 0
- object Label3: TLabel
- Left = 6
- Top = 4
- Width = 99
- Height = 13
- Caption = 'Inheritance hierarchy'
- end
- end
- object TvClassHierarchy: TTreeView
- Left = 0
- Top = 22
- Width = 211
- Height = 179
- ReadOnly = True
- Indent = 19
- Align = alClient
- TabOrder = 1
- end
- end
- end
- end
- end
-